load(file="bichos.rdata")
ls()
rm(temp1, temp2, temp3)
save(anfibios, aves, mamiferos, file= "bichos01.rdata")
